150 PRINT"5=[195]OMMODORE [205][208][211]802"
300 INPUT"";P:IFP<1ORP>5THEN300
305 IFP<>5THEN310
306 OPEN15,8,15
307 PRINT#15,"S:PRINTER":GOSUB6100:IFF>1THEN307
308 PRINT#15,"C:PRINTER=MPS802":GOSUB6100:IFF>1THEN306
309 END